home *** CD-ROM | disk | FTP | other *** search
/ PC PLAY 8 (Swedish) / PC PLAY 8.iso / play / disclaim.dxr / 00001_StartMovie.ls next >
Encoding:
Text File  |  1997-10-22  |  243 b   |  16 lines
  1. global gMovieList
  2.  
  3. on startMovie
  4.   if objectp(gMovieList) then
  5.     go("D" & GetLanguage(gMovieList))
  6.   end if
  7. end
  8.  
  9. on keyDown
  10.   if (the key = RETURN) and objectp(gMovieList) then
  11.     GoForward(gMovieList)
  12.   else
  13.     go(1, "MAIN")
  14.   end if
  15. end
  16.